/*----------------------------------------------------------------------------*/

function cColorAt( nRow, nCol )

return cN2Color( asc( substr( savescreen( nRow, nCol, nRow, nCol ), 2, 1 ) ) )

/*----------------------------------------------------------------------------*/
